##
## MUR DE BRIQUES.
## Ussus de l'Hebdogiciel n85.
## Dcouvrez par ce programme sympa. Le plaisir simple
## et naturel de la casse sur votre PC 1500.
## Mode d'emploi:
## Faites NEW&44EA
## Puis entrez les codes MACHINE  l'aide du programme chargeur.
## Ce travail effectu. effacez ce programme et tapez le programme
## BASIC. Aprs le gnrique. l'engagement et les dplacements
## s'effectuent part appui sur SPACE ou ENTER. L'appui sur
## OFF stoppe momentanement la trajectoire de la balle; celle-ci est
## dbloque par appui sur une touche quelconque.
## Franois LACAZE.
## 
## USE :  ASM & ORG to type the machine Code.
## You can use &h****,h**** or ****h to
## set an hexadecimal value, or nothing to
## set a decimal memory offset.

## HEX=Hexadecimal values.
## DEC=Decimals values.
## BIN=Binary values.
## ... beatween brackets.
## Use the "\" character to cut a long line
## without add a "return" directive.
## ASM type-in.
## Each Machine code bloc
## will be send to the PKM/MEM file.

## Reset Basic memory offset.
[NEW&44EA]

## Machine code.
 [ASM ORG(&h4000) DEC:\
181,51,174,\
120,192,181,\
32,174,120,\
193,181,48,\
104,120,106,\
199,46,98,\
110,193,153,\
6,181,96,\
174,120,201,\
181,16,174,\
120,203,174,\
120,202,181,\
3,174,120,\
206,174,120,\
207,181,1,\
174,120,204,\
174,120,205,\
223,174,120,\
200,190,238,\
113,190,64,\
173,190,64,\
65,154,181,\
109,174,120,\
117,104,120,\
106,192,181,\
\
8,190,237,\
0,154,190,\
228,44,155,\
5,183,13,\
139,6,183,\
32,139,2,\
158,15,106,\
80,72,1,\
74,255,190,\
230,111,165,\
120,207,223,\
129,14,174,\
120,207,165,\
120,192,223,\
174,120,192,\
190,64,65,\
154,186,67,\
55,165,120,\
192,221,174,\
120,192,165,\
120,207,221,\
174,120,207,\
26,181,0,\
179,10,82,\
153,5,42,\
72,1,74,\
80,190,230,\
111,253,168,\
181,10,190,\
64,213,190,\
64,65,253,\
42,98,153,\
22,154,181,\
25,174,120,\
117,253,200,\
181,127,190,\
237,239,253,\
138,223,223,\
183,5,153,\
18,154,104,\
112,106,51,\
37,185,15,\
137,9,98,\
\
153,8,190,\
64,173,190,\
64,127,154,\
249,26,165,\
120,199,18,\
183,58,131,\
4,174,120,\
199,154,177,\
10,174,120,\
199,104,120,\
106,198,37,\
221,183,58,\
131,2,46,\
154,181,48,\
46,98,110,\
193,153,16,\
154,165,120,\
204,139,28,\
165,120,201,\
223,253,200,\
174,120,201,\
253,138,137,\
14,106,80,\
72,1,74,\
50,190,230,\
111,181,0,\
174,120,204,\
154,165,120,\
201,221,253,\
200,174,120,\
201,253,138,\
183,100,153,\
16,165,120,\
206,175,120,\
202,139,18,\
106,255,72,\
1,74,10,\
190,230,111,\
181,1,174,\
120,204,190,\
65,77,154,\
181,1,174,\
120,211,154,\
\
165,120,202,\
217,175,120,\
206,139,4,\
181,1,142,\
2,181,0,\
174,120,212,\
165,120,205,\
137,33,165,\
120,212,137,\
20,165,120,\
208,223,174,\
120,208,137,\
10,181,1,\
174,120,208,\
181,0,174,\
120,205,154,\
165,120,208,\
221,174,120,\
208,154,165,\
120,212,137,\
2,158,15,\
165,120,208,\
223,174,120,\
208,137,8,\
181,1,174,\
120,208,174,\
120,205,154,\
165,120,203,\
223,253,200,\
174,120,203,\
253,138,139,\
1,154,165,\
120,205,139,\
27,165,120,\
202,217,174,\
120,202,217,\
129,10,181,\
64,174,120,\
202,181,0,\
174,120,205,\
165,120,208,\
174,120,203,\
154,165,120,\
\
202,213,174,\
120,202,145,\
16,181,1,\
174,120,202,\
174,120,205,\
158,26,165,\
120,201,183,\
32,131,108,\
190,238,206,\
175,120,202,\
139,44,165,\
120,201,251,\
177,5,213,\
42,181,11,\
251,32,253,\
200,190,64,\
213,190,64,\
65,253,138,\
42,72,1,\
74,100,190,\
230,111,165,\
120,204,137,\
4,181,1,\
142,2,181,\
0,174,120,\
204,251,181,\
255,161,120,\
209,253,200,\
165,120,210,\
174,120,117,\
190,238,206,\
174,120,212,\
253,138,169,\
120,212,190,\
237,239,165,\
120,201,174,\
120,117,190,\
238,206,171,\
120,202,190,\
237,239,165,\
120,201,174,\
120,210,165,\
120,202,174,\
\
120,209,154,\
137,53,165,\
120,204,139,\
33,106,45,\
181,0,253,\
200,36,174,\
120,117,253,\
138,190,237,\
239,98,110,\
32,153,18,\
181,32,174,\
120,117,165,\
120,202,190,\
237,239,158,\
53,181,31,\
174,120,117,\
181,0,190,\
237,239,190,\
64,194,158,\
28,165,120,\
201,174,120,\
117,165,120,\
202,190,237,\
239,165,120,\
204,137,20,\
165,120,201,\
251,177,10,\
183,32,129,\
8,174,120,\
117,181,0,\
190,237,239,\
158,105,165,\
120,201,249,\
179,10,183,\
100,147,12,\
174,120,117,\
158,22,190,\
228,44,139,\
12,183,13,\
139,20,183,\
32,139,42,\
183,15,139,\
1,154,190,\
\
228,44,153,\
5,190,228,\
44,155,5,\
154,165,120,\
206,213,131,\
16,174,120,\
206,253,200,\
181,100,174,\
120,117,253,\
138,190,237,\
239,154,181,\
3,158,20,\
165,120,206,\
217,174,120,\
206,217,131,\
5,165,120,\
206,158,32,\
181,96,158,\
39,190,68,\
0,190,64,\
0,165,120,\
203,174,120,\
208,181,0,\
174,120,211,\
190,64,80,\
190,64,253,\
190,65,158,\
190,65,220,\
\
190,66,189,\
\
190,67,58,\
165,120,211,\
155,20,174,\
120,204,190,\
67,70,158,\
36,253,42,\
154,104,8,\
106,255,98,\
153,3,253,\
98,153,7,\
154,181,99,\
174,120,117,\
253,200,181,\
0,190,237,\
\
239,253,138,\
223,183,83,\
153,17,154,\
127,127,2,\
12,2,127,\
127,0,63,\
127,64,64,\
64,127,63,\
0,127,127,\
9,9,9,\
127,118,0,\
0,0,0,\
0,0,0,\
0,0,127,\
127,65,65,\
65,127,62,\
0,127,127,\
73,73,73,\
65,65,0,\
0,0,0,\
0,0,0,\
0,0,127,\
127,73,73,\
73,127,54,\
0,127,127,\
9,9,9,\
127,118,0,\
65,65,127,\
127,127,65,\
65,0,62,\
127,65,105,\
113,63,94,\
0,63,127,\
64,64,64,\
127,63,0,\
127,127,73,\
73,73,65,\
65,0,70,\
79,73,73,\
73,121,49,\
0,62,65,\
93,85,85,\
65,62,80,\
\
65,82,32,\
70,82,65,\
78,67,79,\
73,83,32,\
76,65,67,\
65,90,69,\
49,57,56,\
53,32,80,\
65,82,32,\
72,69,66,\
68,79,71,\
73,67,73,\
69,76,0,\
16,128,0,\
0,128,0,\
0,181,155,\
174,120,192,\
104,67,106,\
90,174,120,\
117,253,200,\
253,168,37,\
190,237,23,\
190,237,239,\
253,42,253,\
138,221,96,\
110,202,139,\
8,183,157,\
153,25,181,\
156,158,30,\
165,120,192,\
223,183,20,\
153,44,74,\
3,104,255,\
106,255,98,\
153,3,253,\
98,153,7,\
66,153,10,\
104,7,181,\
155,174,120,\
117,253,168,\
253,200,190,\
238,206,213,\
190,237,239,\
\
253,138,253,\
42,223,153,\
21,253,98,\
153,27,181,\
17,174,120,\
117,104,67,\
106,209,181,\
19,190,237,\
0,74,3,\
104,255,106,\
255,98,153,\
3,253,98,\
153,7,66,\
153,10,104,\
7,181,155,\
174,120,117,\
253,168,253,\
200,190,238,\
206,213,190,\
237,239,253,\
138,253,42,\
223,139,25,\
174,120,117,\
253,168,253,\
200,190,238,\
206,217,190,\
237,239,253,\
138,253,42,\
223,106,255,\
98,153,3,\
158,47,253,\
98,153,53,\
181,0,104,\
67,106,202,\
174,120,117,\
253,200,253,\
168,37,190,\
237,239,253,\
42,253,138,\
96,221,183,\
7,153,21,\
181,17,174,\
120,117,181,\
\
20,104,67,\
106,228,190,\
237,0,74,\
5,104,0,\
106,0,98,\
153,3,253,\
98,153,7,\
66 ]

## ,153,10,\
## 154 ]

## Type "GOTO 6" to run game.
## CALL &4400 (CALL &4307) splash routine bugged.

## 1 ARUN:WAIT:PRINT " "
1 GOTO 6
2 IF PEEK &4400=&B5 THEN CALL &4307:GOTO 10
5 CLOAD M"MUR DE BRIQUES"
6 INPUT "MEIL. SCORE : ";Z$
9 CALL &430A
10 X$=RIGHT$(A$,6):CLS:WAIT 200:IF X$>Z$THEN 50
11 PRINT "  VOTRE  SCORE : ";X$
12 PRINT "MEILLEUR SCORE : ";Z$
15 INPUT "VOULEZ-VOUS REJOUER ?";S$:CLS:IF S$="O"THEN 9
20 CALL &CD71
50 PRINT "VOUS AVEZ BATTU LE SCORE":PRINT X$:" CONTRE ";Z$:Z$=X$:GOTO 12